function [x,n]=c2r(x); 
% function [x,r]=c2r(x); 
% Convert from a Column to a Row vector
% n is the dimension of the row vector (i.e. number of columns)
[m,n]=size(x); 
if m > n; 
    x=x'; 
    n = m; 
end 